//---------------------------------------------------------------------------

#ifndef form_ChInprodH
#define form_ChInprodH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <DBGrids.hpp>
#include <Grids.hpp>
#include <DB.hpp>
#include <IBCustomDataSet.hpp>
#include <IBQuery.hpp>
#include <ExtCtrls.hpp>
//---------------------------------------------------------------------------
class TFChInprod : public TForm
{
__published:	// IDE-managed Components
        TDBGrid *DBGrid1;
        TDataSource *DataSource1;
        TIBQuery *IBQuery1;
        TIntegerField *IBQuery1IDIN;
        TDateField *IBQuery1INDATE;
        TPanel *Panel1;
        TIBQuery *AskDel;
        TPanel *Panel2;
        TButton *Button1;
        TButton *Button2;
        TButton *Button3;
        void __fastcall DBGrid1KeyPress(TObject *Sender, char &Key);
        void __fastcall FormCreate(TObject *Sender);
        void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
        void __fastcall Button3Click(TObject *Sender);
        void __fastcall Button1Click(TObject *Sender);
        void __fastcall Button2Click(TObject *Sender);
        void __fastcall FormMouseWheel(TObject *Sender, TShiftState Shift,
          int WheelDelta, TPoint &MousePos, bool &Handled);
private:	// User declarations
public:		// User declarations
        __fastcall TFChInprod(TComponent* Owner);
        void __fastcall DelCurr();
        void __fastcall ShowCurr();
};
//---------------------------------------------------------------------------
extern PACKAGE TFChInprod *FChInprod;
//---------------------------------------------------------------------------
#endif
